home *** CD-ROM | disk | FTP | other *** search
- /*
- ------------------------------------------------------------
- variablesDEMO.rexx
-
- This script demonstrates how to define variables
-
- Copyright ©1996 WK-Artworks
- ------------------------------------------------------------
- */
-
-
- if ~show('P','Wildfire') then do
- say " Error: The Wildfire-program must be started before executing this script."
- exit
- end
-
- address "Wildfire"
- options results
-
- txt_text "tutorial/variables/txt1"
- txt_centre
- txt_wait
-
- v_clear
- pc_clear
- m_openprocessor
- pc_openvariables
-
- txt_text "tutorial/variables/txt2"
- txt_centre
- m_wait 3
-
- v_add 'test'
- m_wait 2
-
- txt_text "tutorial/variables/txt3"
- txt_centre
- m_wait 3
- v_envelope
- m_wait 3
- ev_add 10 2
- ev_add 20 '-3'
- ev_add 30 1
- ev_add 40 '-0.5'
- ev_add 50 '-2'
- ev_add 60 4
- m_wait 2
-
- txt_text "tutorial/variables/txt4"
- txt_centre
- m_wait 3
- v_envelope
- ev_viewall
- m_wait 2
-
- txt_text "tutorial/variables/txt5"
- txt_centre
- m_wait 3
- v_envelope
- ev_interpolation BEZIER
- m_wait 2
- ev_interpolation LINEAR
- m_wait 2
- ev_interpolation SPLINE
- m_wait 2
-
- txt_text "tutorial/variables/txt6"
- txt_centre
- m_wait 3
- v_envelope
- ev_scrollleft
- ev_scrollleft
- ev_scrollleft
- ev_scrollleft
- ev_scrollleft
- ev_scrollup
- ev_scrollup
- ev_scrollright
- ev_scrollright
- ev_scrolldown
- ev_scrollright
- ev_scrolldown
- ev_scrollright
- ev_scrollright
- m_wait 2
-
- txt_text "tutorial/variables/txt7"
- txt_centre
- m_wait 3
- v_envelope
- ev_select 1
- ev_selectnext
- m_wait 1
- ev_selectnext
- m_wait 1
- ev_selectnext
- m_wait 1
- ev_selectprev
- ev_drag 21 4 24
- ev_drag 20 '-3' 24
- ev_drag 15 2 24
- ev_drag 20 '-3' 24
- m_wait 1
- ev_selectnext
- ev_interpolation BEZIER
- ev_drag 30 5 24
- ev_drag 39 4 24
- ev_drag 21 3 24
- ev_drag 23 '-3' 24
- ev_drag 30 1 24
- ev_selectnext
- ev_drag 40 '5.7' 24
- m_wait 2
-
- txt_text "tutorial/variables/txt8"
- txt_centre
- m_wait 3
- ev_openadvanced
- eva_xval "1.0"
- eva_yval "0.5"
- m_wait 2
- v_envelope
- eva_shift
- eva_shift
- eva_shift
- eva_shift
- eva_shift
- eva_shift
- eva_shift
- eva_shift
- eva_shift
- eva_shift
- eva_shift
- eva_shift
- m_wait 2
- ev_openadvanced
- eva_xval "-2.0"
- eva_yval "-1.0"
- m_wait 2
- v_envelope
- eva_shift
- eva_shift
- eva_shift
- eva_shift
- eva_shift
- eva_shift
- m_wait 2
- eva_close
- ev_viewall
- m_wait 2
-
- txt_text "tutorial/variables/txt9"
- txt_centre
- m_wait 3
- pc_closevariables
- m_wait 2
-
- txt_text "tutorial/variables/txt10"
- txt_centre
- m_wait 3
- pc_add rotate stream stream 160 128 100 'test' 1.0
- m_wait 2
-
- txt_text "tutorial/variables/txt11"
- txt_centre
- m_wait 3
- pc_openedit
- pc_moveedit 0 0
- m_wait 2
-
- txt_text "tutorial/variables/txt12"
- txt_centre
- m_wait 3
-
- txt_text "tutorial/variables/txt13"
- txt_centre
- m_wait 3
- v_clear
- pc_clear
- m_closeprocessor
- m_wait 2
-
- txt_text "tutorial/variables/txt14"
- txt_centre
- txt_wait
-